home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 09-05.C < prev    next >
Text File  |  1991-05-05  |  580b  |  32 lines
  1. char triangle[] = {
  2.    0x11,0x11,0x11,0x11,0x10,
  3.    0x01,0x22,0x22,0x21,0x00,
  4.    0x00,0x12,0x22,0x10,0x00,
  5.    0x00,0x01,0x21,0x00,0x00,
  6.    0x00,0x00,0x10,0x00,0x00
  7.    };
  8.  
  9. main()
  10. {
  11.    int old_mode;
  12.  
  13.    if (fg_testmode(9,1) == 0) {
  14.       printf("This program requires a 320 ");
  15.       printf("x 200 Tandy graphics mode.\n");
  16.       exit();
  17.       }
  18.  
  19.    old_mode = fg_getmode();
  20.    fg_setmode(9);
  21.  
  22.    fg_setcolor(7);
  23.    fg_rect(0,319,0,199);
  24.  
  25.    fg_move(156,101);
  26.    fg_drwimage(triangle,5,5);
  27.    fg_waitkey();
  28.  
  29.    fg_setmode(old_mode);
  30.    fg_reset();
  31. }
  32.